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68HCll Cross Assembler Now Here! 


At long last, I have written a cross assembler for the Motorola 
68HCl1l. A lot of you have been asking about it, and thanks to 
the persistence of one customer it is now available. See our ad 
on page 3 for pricing and a list of other cross assemblers. 


A Visit to Phoenix 


The weekend of June 10-12 I attended the AZ Apple Fiesta in 
Phoenix, Arizona. (How can this be reported in the "April" 
issue? Sorry, we are still woefully behind in the publishing 
schedule, it is now late June.) The main attraction for me was a 
chance to spend a day at Western Design Center with Bill Mensch, 
the chief designer of the 65816 and its predecessors. 


Secondly, I wanted to attend Randy Hyde's mini-conference ona 
new standard for 6502 family assembly language. Randy was there, 
with Brian Fitzgerald who now supports and markets the Lisa 
assembler. Roger Wagner represented the Merlin interests, and 
Mike Westerfield the ORCA/M and APW. Paul Santa-Maria and Chuck 
Kelly from ProDev Inc. in Michigan came to see about 
standardizing a symbol table format for use with symbolic 
debuggers. I also met P. J. Curran from ProData 21 in Florida. 
Since one cannot fly the 1000 miles to Phoenix directly from 
Dallas for less than $250 each way, I drove 200 miles south to 
Austin to get a round trip ticket for only $138. Bill Morgan 
lives in Austin now, and he decided to come also. Jeff Creamer 
and Don Lancaster were also involved in this conference. As far 
as I could tell, we did not make any real decisions about any 
changes to existing assemblers, or even future ones. Neither did 
we gain any hard data about the new opcodes and addressing modes 
of the 65832. But it was a very positive meeting. 


(continued on page 32.) 


Peeking Inside AppleWorks 1.3, Part 5: 
Menu Display and Selection Subroutines....Bob Sander-Cederlof 


Part 5 already? This is rapidly turning into a major series, 
and a popular one at that. A lot of you have called or written 
telling how much you like it (thank you!), so I will do my best 
to keep it interesting and useful. 


This month I am going to document some subroutines which 
constitute a major portion of the “AppleWorks Human Interface". 
Namely, the menu display and selection subroutines. 


We hear so much these days about the MacIntosh human interface, 
and indeed it has become the standard for the IIgs, like it or 
not. Personally, I can live with it, but I prefer plain old 
text menus. Why? They are faster, consume less of the 
computer's resources (leaving more of them for end users), and 
are quicker (for me) to use. Well-designed text menus with a 
consistent screen layout and selection method are easier for me 
than icons and mice. 


How can that be? I thought Apple had proven the icon menu to 
be easier? I suppose they decided that after asking “the rest 
of us", leaving out the experienced computer people. But isn't 
text what we are trained from childhood to read? Some 
languages are written with icons (Chinese, for example), but 
MOST languages are written with text. And isn't the text-menu 
drilled into us from childhood also? Even the word “menu" 
reminds us of a list of textual lines for selecting the 
components of a meal. And what about multiple-choice tests? 


And even some of the Apple folk believe in text, as is 
evidenced by the Control Panel and other Classic Desk 
Accessories on the IIgs. 


All the above to justify adding my voice to that of Tom 
Weishaar. Tom is the author of the Open-Apple newsletter, 
which all Apple II lovers ought to read. We both think the 
AppleWorks human interface is a great starting point for the 
Apple II general operating environment. With just a little 
improvement, mostly in the area of pathname entry, and just a 
little generalization, we could use it for running all sorts of 
applications and compilers for all sorts of languages. 


AppleWorks has an amazingly consistent human interface 
throughout. At almost every level you will see a simple list 
of numbered choices, with the same control scheme. One of the 
lines will be displayed in inverse mode, and you can either 
move the "bar“ with the up- and down-arrow keys, or by typing 
the item number. When the bar is on your choice, the RETURN 
key will select it. ESCAPE will pop out of the menu to the 
previous level. You can usually get a help screen by typing 
Apple-?. The directions for getting help are shown at the 
right end of the bottom line, and the action ESCAPE will cause 
are shown at the right end of the top line. 


If there happen to be more than nine numbered options, so that 
some of them have two-digit options, AppleWorks even allows you 
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S-C Macro Assembler Version 2.0 e's le 
Version 2.0 DOS Upgrade Kit for 1.0/1. V1. 2 owners . . «2. «© e« -« 
ProDOS Upgrade Kit for Version 2.0 DOS owners . . . «© «© «© « « 
Cross Assemblers for owners of S-C Macro Assembler . . . — 

(Available: 6800/1/2, 6301, 6805, 6809, 68HC11, 


DOS $100, ProDOS $100, both for $120 


- $20 
- $30 


i $32. 50 to $50, each 


68000, 2-80, z-8, 8048, 8051, 


RCA 1802/4/5, PDP-11, G1I1650/70, Mitsubishi 50740, others) 


Source Code of any S-C Macro Assembler or Cross Assembler... . 
S-C DisAssembler (ProDOS only)... ... .- 
RAK-Ware DISASM (DOS only) . . . .« 56 «© « -« 
ProVIEW (ProDOS-based disk utility program) . . . . . .« « .- 
Full Screen Editor for S-C Macro (with complete source code). . . 
S-C Cross Reference Utility . . . .«. « « « . 


ES-CAPE Version 2.0 and Source Code Update (for Registered Owners) . 
Bag of Tricks 2 (Quality Software). . . . 2 «6 « © e« © « -« 
S-C Documentor (complete commented source code of Applesoft ROMs) . 
Copy II Plus (Central Point Software) gta) 8? Aer as SP ee Ge 

AAL Quarterly Disks re ee ee ee ee ce a ee a re ee ee 


(All source code is formatted for S-C Macro Assembler. 
require some effort to convert file type and edit directives. ) 


Vinyl disk pages, 6"x8.5", hold two disks each .... . 

Diskette Mailing Protectors (hold 1 or 2 disks) . . .. . 
(Cardboard folders designed to fit 6"X9" Envelopes. 

Envelopes for Diskette Mailers . . . . . .« «6 «© «© « 


o wwe le 


Sider 20 Meg Hard Disk, includes controller & software... . . 
Sider 40 Meg Hard Disk, includes controller & software... . . 


Minuteman 250 Uninterruptible Power Supply . . . . . .« « « -« 
Minuteman 300 Uninterruptible Power Supply . . . . .« .« « « « 


65802 Microprocessor, 4 MHz (Western Design Center)... .. .- 
quikLoader EPROM System (SCRG) . . . . . «© « «© «© «© «© « « 
PROmGRAMER ( SCRG ) e ° ° e e e e e e e e e e ° e e e 


"Exploring the Apple IIgs" . . . . . .« « + «© « 


- each, 


without source code $30, 
without source code $30, 


without source code $20, 
S-C Word Processor, both DOS & ProDOS, both 40- & 80-columns, with complete source code 

DP18 and DPFP, double precision math for Applesoft, including complete source code. . . 
ES-CAPE (Extended S-C Applesoft Program Editor), including Version 2.0 With Source Code . 


exch $15, or any four for 


Other assemblers 


. Gary B. Little 


"Apple IIgs Technical Reference" ... . 6 « o « « Michael Fischer 
"65816/65802 Assembly Language Programming". - «© « « .« «Michael Fischer 
"Programming the 65816" . . . . . « « David Eyes & Ron Lichty 
"Programming the Apple IIgs in C and Assenbly Language". - . Mark Andrews 
"Apple //e Reference Manual"®. . . . . « « « « « «+ « Apple Computer 
"Apple //c Reference Manual®. .. . . e©« «e« o« « e« « « Apple Computer 
"ProDOS-8 Technical Reference Manual®. * © e« « « « « « Apple Computer 
"ProDOS-16 Technical Reference Manual® . . . . «. « +» +» Apple Computer 
"Apple IIgs Firmware Reference™. . . . «. « « « « e« « Apple Computer 
"Apple IIgs Hardware Reference". . . « « « « « « Apple Computer 
"Apple IIgs Toolbox Reference, Volume 1", . «© «© « « « « Apple Computer 
"Apple IIgs Toolbox Reference, Volume 2". . . . . «| + « Apple Computer 
"Apple IIgs Programmer's Introduction® . . . . . . « +. Apple Computer 
"ProDOS Inside and Out®" . . . . . « « «. + #« Dennis Doms & Tom Weishaar 
"Beneath Apple ProDOS". . . . . . « « « «. Don Worth & Pieter Lechner 
"Beneath Apple DOS". . . . . .« « « « « «+ Don Worth & Pieter Lechner 
"Inside the Apple //c®. . . . . «6 « »« «»« « « « « . Gary B. Little 
"Inside the Apple //e". . . . «6. « +» « « « « « e« .« Gary B. Little 
"Understanding the Apple //e® . . . . .« « « « « « « « Jim Sather 
"Understanding the Apple II". . . . . .« «« « « « « »« « Jim Sather 
"Apple II+/IIe Troubleshooting & Repair Guide™. . . . . . . +. £=Brenner 


"Assembly Language for Applesoft Programmers"... .. « 
"Now That You Know Apple Assembly Language®. . . . .. . 
"Enhancing Your Apple II, vol. 1". . . . 2. « © «© «© 
"Enhancing Your Apple II, vol. 2". . . . «.« +6 « «© « « 
"Assembly Cookbook for the Apple II/IIe". . . . . .. « 
"Microcomputer Graphics® . . . . . 6 «© «© «© «© «© « « 


® These items add $2 for first item, $.75 for each 
+ Inquire for shipping cost. 

Customers outside USA inquire for postage needed. 
Texas residents please add 8% sales tax to all orders. 
<< Master Card, VISA, Discover and American Express >> 


additional 


Finley & Myers 
-Jules Gilder 
Don Lancaster 
Don Lancaster 
Don Lancaster 
- Roy E.Myers 


DALLAS, TX 75228 
Phone 214-324-2050 


8085, 


additional $100 
with source $50 
with source $50 
$20 
- $49 
with source $50 
$50 
$50 
$50 
- $30 
$45 
- $50 
$30 
$45 


(a9, 95) 
" ($39.95). 


: 10 for $6 
40 cents each 
or $25 per 100 
6 cents each 


- ($695) $550 
- ($995) $860 
- ($359) $320 
- ($549) $490 
rr 9-1.) 
- ($179) $170 
($149.50) $140 
($22.95) $21 
($19.95) $19 
($21.95) $20 
($22.95) $21 
($18.95) $18 
($24.95) $23 
($24.95) $23 
($29.95) $27 
($29.95) $27 
($24.95) $23 
($24.95) $23 
($26.95) $24 
($26.95) $2u 
($32.95) $30 
($16.95) $16 
($19.95) $18 
($19.95) $18 
($19.95) $18 
($19.95) $18 
($24.95) $23 
($22.95) $21 
($19.95) $18 
($18.95) $18 
($19.95) $18 
($15.95) $15 
($17.95) $17 
($21.95) $20 
($14.95) $14 


item for US shipping. 


S-C Software Corporation 
2331 Gus Thomasson #125 
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to move the bar to the two-digit lines by typing their numbers. 
When you type a digit, the bar moves to one of the first nine 
lines. Then if you type a second digit, AppleWorks tries to 
move to the line with that two-digit number. If there is not 
one, you will hear a beep. If there is, the bar will move to 
that line. You can observe this action even on a menu with 
fewer than ten lines. When you select a line by typing a 
digit, you will not only see the bar move, but also the help 
and escape messages will change. On the top line you will see 
“Escape: Erase entry", and on the bottom line instead of an 
offer of help you will see °xxxK Avail.” (the number of 
available memory bytes). When you type a second digit, you 
hear the beep and the help and escape info changes back to what 
it was before you typed the first digit. 


Pretty slick. Until now I always assumed that numeric 
selection would either be limited to single-digit items, or 
that I would have to require a terminating character from the 
user so I would know when he had typed all the digits. Robert 
Lissner wins again! (Some of you have pointed out his name 
used to be “Rupert”, but I read somewhere that he now prefers 
“Robert”, or Bob.) 


AppleWorks also allows the menu items to be anywhere on the 
screen. They do not even all have to be in one column, or 
vertically aligned. You can use single, double, or even 
variable vertical spacing. 


Look ahead to the DISPLAY.MENU.LINE subroutine, lines 
4580-5190. When you want to put a menu on the screen, you call 
this subroutine. The variable LAST.LINE.NUMBER.OF.MENU must be 
initially zeroed, and this subroutine will increment it each 
time you call. You call this subroutine once for each numbered 
line of your menu. Call it like this: 


JSR DISPLAY .MENU .LINE 
DA #column, #line 
-DA string 


The string parameter is the address of a string which begins 
with a length byte. Column and line numbers are either 
absolute or relative. If you give values like 0-23 for line 
and 0-79 for column, they are absolute. If you add $80 to line 
and/or column, it/they become relative to the coordinates 
stored in MENU.CORNER.LEFT and MENU.CORNER.TOP. Lines 
4850-5000 compute the actual coordinates of the beginning of 
your menu line. 


A block of 93 bytes called MENU.TABLE allows for keeping track 
of 30 menu lines. Each entry in this table is three bytes, and 
the zero'th entry is not used. Each time you call 
DISPLAY.MENU.LINE one entry is added to this table. Each 
three-byte entry consists of the column, line, and length of 
the menu item. 


DISPLAY .MENU.LINE also takes care of prefixing the menu line 


number. You do not include it in your string. (This allows 
you to use the same strings in different menus.) Lines 
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The new DataLink' 2400 modem 


from Applied Engineering, it's a lot more 
than just twice as fast. 


Applied Engineering’s new DataLink™ 2400. Simply put, 
the finest modem on the market for your Apple IIcs, 
Ile or II+. 

Bring home a world of information . . . from up to the 
minute flight information to whole libraries of resource 
materials. Even download free software and games. 


Twice the speed. 

At transmission speeds up 
to 2400 bps (bits-per-second), 
Applied Engineering's new 
DataLink 2400 is capable of 
putting text on the screen faster * 
than the human eye can follow. 
That means you can capture a 
great deal more material in less 
time than with 1200 bps modems. And unlike other 
modems, the DataLink 2400 comes complete with 
powerful, easy-to-use communications software. 


Complete communications software included. 
Both our new DataLink 2400 and our DataLink 1200 
modems feature AE’s exclusive communications software 

—on disk and in ROM—everything needed to get you 
immediately up and running. Our powerful DataTerm 
software for the IIcs and Ile supports VT-52 screen 
emulation, macros, file wansfers, on-line time display, 
recording buffer and more. It even stores hundreds of 
phone numbers for auto-dialing and log on. And for II+ 
and 64K Ile owners, our OnLine 64 software has many of 
the same powerful features. 


Worldwide com 

The DataLink 2400 is fully compatible with Bell 103 and 
212 protocols, as well as European protocol CCITT V.22 
BIS, V.22 and V.21. It operates at varying transmission 
speeds from 0-300, 1200 and 2400 bps. 

The new 2400, like our best-selling DataLink™ 1200, 
carries a full five year warranty and comes complete with 
two modular phone jacks for data and voice calls, a 
thoughtful feature that means fewer wires to connect We 
also include an extra long telephone cable, in case your 
computer is across the room from your telephone jack. 
You can track the progress of calls either electronically or 
via on-board speaker. And built-in diagnostics reliably 
check transmission accuracy. 


ath 


Prices subject to change without notice. Brands and product names are registered 
trademarks of their respective bolders. 


Packed with important features: 

e Non-volatile memory for modem configuration 

e Full Hayes AT compatibility 

¢ Point-to-Point, ASCII Express, Access II compatibility, in 
addition to AE’s included DataTerm and OnLine 64 
software. 

e Super Serial Card “Front End” for highest software 
compatibility (unlike others) 

e Adaptive equalization and descrambling 

e Hardware configuration for DSR and DCD 

e PC Transporter (MS-DOS) compatibility 

e FCC certified design 


$204.90 in freebies. 
We also throw in a nice collection of 
goodies—a free subscription to the 
GEnie network worth $29.95, $60 of 
free on-line time from NewsNet, a free 
a $50 subscription to the Official Airline 
fy } “© Guide and a fee-waived membership 
nasi “eg, to The Source worth $49.95 plus 
- $15 of free on-line time. 
That's $204.90 worth of free 
memberships, discounts and 
on-line time when you purchase the powerful DataLink 
2400 at $239. 


DataLink 1200 reduced. 

Loaded with all the features of the new 2400, (except 
CCITT, DSR/DCD and non-volatile ROM pss ENED 
our 1200 bps DataLink modem, com- 
plete with software and freebies, is an 
affordable alternative at only $179. ae , 
Datalink 1200. ......-.csecccececcoeeceeeee $179 


Order today! 

To order or for more information, see your dealer or call 
(214) 241-6060 today, 9 am to 11 pm, 7 days. Or send 
check or money order to Applied Engineering. MasterCard, 
VISA and C.O.D. welcome. Texas residents add 7% sales 
tax. Add $10 outside US.A 


HE. APPLIED ENGINEERING” 
The Apple enhancement experts. 


(214) 241-6060 


P.O. Box 5100, Carrollton, TX 75011 
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4690-4800 start building a display string in what 1 call the 
STR.AO0O buffer. It begins with token $05, which means 
“position cursor". Then it inserts the line number in the 
format “d. "“ or “dd. "“. Lines 4850-5000 insert the chosen 
Cursor position after the $05 token. Lines 5010-5140 append 
your string to this position and line number string. Finally, 
lines 5150-5190 display the result. 


So you can see that to put a complete menu on the screen we 
would first zero LAST.LINE.NUMBER.OF.MENU; then clear the 
window we are using; then call DISPLAY.MENU.LINE once for each 
menu item; and finally, add any titles and explanations. 


Once a menu is on the screen, the next logical step is to call 
SELECT.MENU.LINE so the user can tell you his choice. This 
subroutine is shown beginning at line 2000. You call it with a 
line number in the A-register. The subroutine even expects 
that you have just loaded that number into the A-register, 
because it starts with a BEQ instruction. If the EQ status is 
set, probably meaning you just did a LDA #0, the menu will 
begin with the bar on the first menu line. You will also get 
the first item if the value in A is larger than the last menu 
litem number, or if A=l. You can begin with any other line by 
putting that line number in A. You could keep track of the 
item selected that last time this menu was used, like Copy II 
Plus does. 


The subroutine finally returns when you type either ESCAPE, 
Apple-?, or RETURN. In the first two cases MENU.LINE.SELECTED 
and the A-register will be zero; in the third case they will 
be, you guessed it, the number of the menu line selected. 


Lines 2000-2110 figure out which line you want to begin with, 
and inverse it. Unless, that is, the value in Z.A4 is 
non-zero. I think that variable must be an “escape flag" of 
some sort. If it is non-zero, SELECT.MENU.LINE exits the same 
way it would if you typed the ESCAPE key. 


Lines 2120-2130 display the generic instructions for making a 
menu selection on the screen. The text of this message is 
shown in lines 5200-5230. 


The rest of SELECT.MENU.LINE divides nicely into two main 
sections. Lines 2150-2770 handle the selection until you type 
a digit; lines 2780-3430 take over when you type a digit, and 
don't let go until you either type an arrow (up-, down, or 
left-), DELETE, RETURN, or ESCAPE. I noticed a significant 
chunk of duplicate code in the two sections: see lines 
2420-2470 and lines 3330-3380. I feel certain that the code 
could be re-arranged a little and save space. We don't really 
need it, but a little here and a little there could make room 
for many new features. 


Lines 2150-2190 invert the current line, move the cursor down 
to the bottom line at the end of the "Type..." message, and 
wait for you to type something. If you remember AW.KEYIN from 
the Feb 88 issue, it will also take itS own action if you type 
certain keys. For example, Apple-/ gets changed into Apple-?; 
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Apple-Q and Apple-S store a non-zero value in Z.A4 and change 
the character to ESCAPE; and several other interesting things. 
Look at page 13 in that issue, lines 2580-2790, for a summary. 


Look ahead to lines 2900-3000 for an interesting use of the 
Z.A4 flag. If you typed Apple-Q or Apple-S, it will be 
changed into ESCAPE by AW.KEYIN and Z.A4 will be set non-zero. 
Then the test at 2970-2980 will make the jump all the way to 
SML.ESCAPED. If you typed ESCAPE, that test will merely send 
you back to SML.WAITING. Interesting.... So if you are at 
this level, where the escape info line says "Escape: Erase 
entry": typing one ESCAPE takes you back to SML.WAITING; 
typing two ESCAPEs would get you to SML.ESCAPED, or typing one 
Apple-Q would do the same thing. Whoever called 

SELECT .MENU.LINE can tell the difference, though, because Z.A4 
will still be non-zero for Apple-Q or zero for two ESCAPEs. 
(For some reason I never can remember what Apple-Q and -S are 
really used for.) 


Lines 2240-2310 branch appropriately for up- or down-arrow or 
RETURN. Lines 2590-2770 handle the up- and down-arrows: 
Simply a matter of changing the display of the current line 
back to normal mode, and raising or lowering the selected line 
number. The line number changes circularly, so that up-arrow 
off the top wraps around to the bottom, and down-arrow at the 
bottom goes to the top. 


Lines 2340-2500 check for a digit and operate on it. Notice 
that only digits 1-9 are accepted here, while digits 0-9 are 
accepted at lines 3170-3200. This will be the first digit of a 
menu line number, so it cannot be zero. The other place it 
will be the second digit, so it could be zero. If this first 
digit is acceptable (between 1 and the last menu line number), 
lines 2420-2470 will echo the character at the cursor on line 
23, restore the current line to normal mode, and store the new 
menu line number. 


Lines 2480-2490 call a subroutine in the S$D0O00 area to change 
the escape and help info. This subroutine decides which pair 
of messages to display by the letter in the caller's 
A-register. Letter “E" makes escape say "Escape: Erase entry" 
and help say how much memory is left. Letter "S“, used in 
lines 1910-1920, makes help say “Apple-? for help“ and escape 
say whatever string was saved in a buffer at SOCFD. The 
subroutine has several other options. 


There appears to be either a bug or a leftover at lines 
2520-2530. If you type Apple-? you get to this line. It loads 
up 2.89, and then acts like you typed ESCAPE. However, the 
contents of 2.89 are not needed here, because the first 
instruction after the JMP is another LDA! 


I have probably already said enough about lines 2800-3430, 
especially since it is so similar to the section above. I 
would, however, like to look at a few lines. The code in lines 
3210-3280 multiplies the previous menu line number by ten and 
adds in the next digit. At first glance it looks reasonably 
efficient for space, since it calls on a multplication 
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subroutine. Nevertheless, I can recode it in one less byte and 
many fewer cycles without calling the subroutine. Change lines 
3210-3280 to the following: 


3210 AND #SOF isolate new digit 
3220 STA 2.91 save for later 
3230 LDA MENU .LINE.SELECTED 

3240 ASL old * 2 

3250 ASL Old * 4 

3260 ADC MENU.LINE.SELECTED old*5 
3270 ASL old * 10 

3280 ADC 2.91 plus new digit 


Let's move ahead. When you type RETURN, lines 3600-3720 will 
Clear line 23, restore the selected line to normal mode, and 
draw an arrow over the line number ("-->"). Either ESCAPE or 
RETURN brings you to lines 3740-3810, which erase the 

MENU .TABLE and return with the selected line number in the 
A-register. It makes no sense to me to erase MENU.TABLE, since 
it will not be used again until it is re-loaded anyway, but 
Maybe there is some reason it is needed. 


Lines 3860-4540 will copy the selected line off the screen into 
a buffer at $0900, and then re-display it in one of three ways: 
the entire line NORMAL, the entire line INVERSE, or just the 
portion (A) characters long starting in column (X) in INVERSE. 


Now if only AppleWorks could handle pathname entry as easily! 
The human interface presented by such Quit Code replacements as 
ProSel, Squirt, or the S-C Program Selector would be an 
improvement. 


80- 1030 PSTR -EQ $80,81 
84 1040 CHAR. FROM. KEYIN -EQ $84 
8C- 1050 MENU.LINE.SELECTED .EQ $8C 
91- 1070 2.91 -EQ $91 result of gra here 
9A- 1080 PO -EQ 39A parameters from GET.4.PARMS 
B- 1090 P1 -EQ $9B " 
C- 1100 P2 ~EQ $9C " 
Ah- nie ZAK .EQ $A4 escape flag??? 
OA00- Mae STR. A0O ~EQ $A00 
OFBE- 1140 MENU .CORNER.LEF -EQ $0FBE 
OFBF- oe MENU . CORNER . TOP -EQ $0FBF 
1170 
1180 -OR $0EB 
OEB6- 1190 MENU.TABLE .BS 3} Room for 30 3-byte entries 
OF 13- ioe LAST. - LINE. NUMBE F.MENU .BS 1 
121 . 
1220 Benn nm mewn www ewe mn mm ne nnn nee eee nn= Covered in AAL--- 
14D1- 1230 DISPLAY.STRING ~-EQ $14D1 Jan 88, page 10 
ee 1240 CONVERT.A.TO.RJBF.STRING .EQ 1798 
1818- 1250 BEEP.AND.CLEAR .KEYBUF -EQ $1818 
1823- 1260 MOVE. CURSOR. TO. XY -EQ $1823 Feb 88, page 17 
1B3A- 1270 MULTIPLY.X.BY.Y ~-EQ $1B3A 
187A- 1280 COPY.SCRN.LINE.TO.0900 -EQ $187A Feb 88, page 18 
18AE- 1290 GET.4.PARMS -EQ $18AE Dec 87, page 7 
1D35- 1300 AW.KEYIN ~-EQ $1D35 Feb 88, page 12 
1ES0- 1310 MOVE.CURSOR.TO.TCOL.TROW .EQ $1E80 
1EA9- 1320 POINT.PSTR.AT.STR.AOO -EQ $1EA Feb 88, page 18 
1EFS= 1330 MOVE.STRING ~-EQ $1EF Dec 87, page 8 
1F3E- 1340 DISPLAY.AT ~-EQ $1F3E 
1FEO- 1350 CLEAR.KEYBUF ~-EQ $1FEO Feb 88, page 17 
209 3- 1360 DISPLAY. STRING. PO -EQ $209 
1FEQ9- 3 O DISPLAY. TOKEN .X -EQ $IFE 
1FF5-—- 1 50 DISPLAY.ON.LINE. 23 -EQ $1FF 
D023- 1800 § SHOW.ESCAPE.AND.HELP.MSGS .EQ $D023 
1H10 fen nn nn nn nnn ee enn eee 
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SCESCECEECEEEEEEESEEEEEEEEEEEEEEEEEEECEEEECEESE 


SPECIAL !!! EXPANDED RAM/ROM BOARD: $39.00 
Similar to our $30 RAM/ROM dev board described below. Except this board has two sockets to hold your choice 
of 2-2K RAM, 2-2K ROM or even 2-4K ROM for a total of 8K. Mix RAM and ROM too. Although Apple limits 
access to only 2K at a time, soft switches provide convenient socket selection. Hard switches control defaults. 


IMPROVED It! JL IN A MAC (ver 2.0): $75.00 
Now includes faster graphics, UniDisk support and more! Bi-directional data transfers are a snap! This Apple II 
emulator runs DOS 3.3/PRODOS (including 6502 machine language routines) on a 512K MAC or MACPLUS All 
Apple |i features are supported such as HI/LO-RES graphics, 40/80 column text, language card and joystick. 
Also included: clock, RAM disk, keyboard buffer, on-screen HELP, access to the desk accessories and support 
for 4 logical disk drives. Includes 2 MAC diskettes (with emulation, communications and utility software, plus 
DOS 3.3 and PRODOS system masters, including Applesoft and Integer BASIC) and | Apple !! diskette. 
SCREEN.GEN: $35.00 

Develop HI-RES screens for the Apple il on a Macintosh. Use MACPAINT (or any other application) on the MAC to 
create your Apple Il screen. Then use SCREEN.GEN to transfer directly from the MAC to an Apple II (with 
SuperSerial card ) or lic. Includes Apple I! diskette with transfer software plus fully commented SOURCE code. 


MIDI-MAGIC for Apple //c: $49.00 
Compatible with any MIDI equipped music keyboard, synthesizer, organ or piano. Package includes a MiDi-out 
cable (plugs directly into modem port - no modificstions required!) and 6-song demo diskette. Large selection of 
digitized QRS player-piano music available for 19.00 per diskette (write for catalog). MIDI-MAGIC compatible 
with Apple Ii family using Passport MIDI card (or our own input/output card w/drum sync for only $99.00). 


FONT DOWNLOADER & EDITOR: $39.00 

Turn your printer into a custom typesetter. Downloaded characters remain active while printer is powered. 
Use with any Word Processor program capable of sending ESC and control codes to printer. Switch back and 
forth easily between standard and custom fonts. Special functions (like expanded, compressed etc.) supported. 
Includes HIRES screen editor to create custom fonts and special graphics symbols. For Apple ll, li+, //e. Specify 
printer’ Apple Imagewriter,Apple Dot Matrix, C Itoh 8510A (Prowriter), Epson FX 80/85, or Okidata 92/192. 
* FONT LIBRARY DISKETTE #1: $19.00 contains lots of user-contributed fonts for all printers 
supported by the Font Downloader & Editor. Specify printer with order. 


DISASM 2.2e : $30.00 ($50.00 with SOURCE Code) 
Use this intelligent disassembler to investigate the inner workings of Apple I! machine language programs. 
DISASM converts machine code into meaningful, symbolic source compatible with S-C, LISA, ToolKit and other 
assemblers. Handles data tables, displaced object code & even provides label substitution. Address-based triple 
cross reference generator included. DISASM is an invaluable machine language learning aid to both novice & 
expert alike. Don Lancaster says DISASM is “absolutely essential” in his ASSEMBLY COOKBOOK. 


The ‘PERFORMER’ CARD: $39.00 ($59.00 with SOURCE Code) 

Converts a ‘dumb’ parallel printer 1/F card into a ‘smart’ one. Simple command menu. Features include 
perforation skip, auto page numbering with date & title, large HIRES graphics & text screen dumps. Specity 
printer: MX-680 with Graftrax-80, MX-100, MX-80/100 with Graftraxplus, NEC 8092A, C.ltoh 8510 
(Prowriter), OkiData 832A/83A with Okigraph & OkiData 92/93. 

‘MIRROR’ ROM: $25.00 ($45.00 with SOURCE Code) 
Communications ROM plugs directly into Novation’s Apple-Cat Modem card. Basic modes: Dumb Terminal, 
Remote Console & Programmable Modem. Features include: selectable pulse or tone dialing. true dialtone 
detection, audible ring detect, ring-back, printer buffer, 80 col card & shift key mod support. 

RAM/ROM DEVELOPMENT BOARD: $30.00 
Plugs into any Apple slot. Holds one user-supplied 2Kx8 memory chip (6116 type RAM for program development 
or 2716 EPROM to keep your favorite routines on-line). Maps into $CnOO-CnFF and $C800-CFFF. 
C-PRINT For The APPLE //c: $69.00 


Connect standard paralle! printers to an Apple //c serial port. Separate P/S included. Just plug in and print! 


Unless otherwise specified, all Apple Il diskettes are standard (not copy protected!) 3.3 DOS. 
Avoid a $3.00 handling charge by enclosing full payment with order. VISA/MC and COD phone orders Ok. 


RAK-WARE 41 Ralph Road W. Orange NJ 07052 (201) 325-1885 
ECEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE 


Apple Assembly Line.....April, 1988.....Copyright (C) S-C SOFTWARE.....Page 9 


18DD- A5 8C 
18E0- 65 8C 


18E4- 20 DD 
18E7- BD B7 


18EB- AQ 00 
18EE~ 20 77 


18F2- 20 DD 
B8 


BD 

48 

BD B7 

A8 
18FD- BD B6 

18 

a 04 


18 

69 02 
08- 20 77 

60 


| 

N 

=) 
=O Onvul 
WWOoWW 


eee me ee ek eed ek ed wed ed ot 
WWDODWOwW Ouiu Ovo 


1A 


OF 
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-MA Pe Macro to muke u string with 
DA 1-#-1 first oye in a ae 
AS miqe the rest is ASC 

- EM 

PH $18DD 


sd boss a ree with pointer into MENU.TABLE 


menu line number times 3. 


h is 
J (1gpp)" 18E4 NCEE 1A4D 


GET.MENU .TABLE.I 
LD 


a Re-d 
# (18E4 
MAKE. ME 


DEX 
na MENU. aL INE. SELECTED 
nay MENU . LINE. SELECTED 


bE entire line in NORMAL mode. 
73 ple hee 1A21 1A39 1A4A 


JSR GET MENU. ATABLE. INDEX 
LDA MENU . TABLE+1,X Get screen line # 


TAY 
eh #$00 Display entire line NORMAL 
ore REVERSE. A.SCREEN .LINE 


tu! 


# Res} i splay the ore line in INVERSE mode. 


# (18F2) 1 


36 19AF 1A2 
MAKE. MENU .LINE. INVERSE 
JSR GET.MENU . TABLE. INDEX 
op MENU .TABLE+2,X get length of menu msg 
LDA MENU.TABLE+1,X get screen line # 
TAY 
are MENU .TABLE,X get starting column of msg 
ADC #4 skip over "##, * 
TAX peert He aeees before msg itself 
nce get length agai 
ADC #2 include leading and trailing blank 
ae REVERSE. A.SCREEN .LINE 


# (190C) 19D8 19E2 19EC 19F6 
RESTORE. ESCAPE. AND. HELP.MSGS 


0 
: SELECT. 


LDA £$53 

JSR SHOW.ESCAPE. AND. HELP.MSGS 
JSR MOVE. CURSOR. TO. TCOL.TROW 
JSR DISPLAY. STRING. PO 

are TWO.BLANKS 


MENU .LINE 
BE menu line 


Use 
CMP LAST. LINE. NUMBE OF. MENU 
BCC .2 Use se lected line 


BEQ .2 Use selected line (bottom) 
LDA #1 Use top menu line 

STA MENU .LINE.SELECTED 

LDA Z.A4 


JSR DISPLAY.ON.LINE.2 
-DA MENU .MSG 5 aur? number, or use arrows, then press Retu) 


BEQ .3 
JMP BT SPcAY LEME og 


sd (1936) | 1397 19AC 19D 


SML.WAIT 
0 


TSR GUAKE. MENU . LINE. INVERSE 

JSR CLEAR .KEYBUF 

JSR MOVE. CURSOR. TO.TCOL.TROW 

JSR AW.KEYIN 

CMP # aie did he type ESCAPE? 
BNE --- not ESCAPE 

JMP SML. ESCAPED 
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For Those Who Want the Most. 
From Those Who Make the Best. GS-RAM* 


Now expand the IIGS’ RAM and ROM with up to8 MEG of “Instant On” memory utth the allnew Gs-RAM! 


Gs-RAM has an all new design. A design that 
delivers higher performance including in- 
creased speed, greater expandability, and 
improved software. 
More Sophisticated, Yet 
Easier to Use 

GS-RAM works with all Ics software. In fact 
any program that runs on Apple's smaller 
memory card runs on the Gs-RAM. But with 
GS-RAM you can have more memory, im- 
proved performance, and almost unlimited 
expansion capabilities We've designed the 
new Gs-RAM to be easier to use too—you 
don’t have to adjust the size of your RAM 
disk every time you use a DMA device. No 
other RAM card with more than 4 banks of 
memory installed can make the same daim. 


More than Just Hardware 

Each Gs-RAM and Gs-RAM Plus includes the 
most powerful set of ics software enhance- 
ments available anywhere. In fact, our nearest 
compettor offers only a fraction of the 
invaluable programs that we include with 
each Gs-RAM card This software includes the 
most powerful disk-caching program available, 
the Gs-RAM Cache. The Cache will make most 
of your applications nun up to 7 Ames faster. 
Also induded is a diagnostic utility that lets 
you test your GS-RAM by graphically showing 
the location of any bad or improperly 
installed RAM chips. And for AppleWorks 
users, we give you our exclusive Expander 
program that dramatically enhances both the 
capabilities and speed of AppleWorks. 
Making AppleWorks Even Better 

Applied Engineering's Expander program 
eliminates AppleWorks intemal memory limits 
allowing it to recognize up to 8 megabytes of 
desktop workspace. You can increase the 
limits from only 7,250 lines to 22,600 lines in 
the word processor and from 6,350 records 
to 22,600 records in the database. The 
Expander allows all of AppleWorks, induding 
pfint functions, to automatically load into 
RAM. The clipboard size will increase from 
255 to 2,042 lines maximum. Gs-RAM will 
automatically segment larger files so you can 
save them onto multiple floppies. And 


Gs-RAM provides a built-in print buffer that 
allows you to continue working in Apple. 
Works while your printer is still processing 
text You can even load Pinpoint or Macro- 
Works and your favorite spelling checker into 
RAM for instant response. 
Grow by Kilobytes or Megabytes 

We offer Gs-RAM in two configurations so 
you can increase your memory 256K at a 
time (Gs-RAM) or a megabyte at a time 
(GS-RAM Plus). Both are IIGs compatible and 
both come with our powerful enhancement 
software. Gs-RAM can hold up to 1.5 MEG of 
256K chips and Gs-RAM Plus can hold up to 
6 MEG using 1 MEG chips. And since both 
use standard RAM chips (not high-priced 
SIMM's), you'll find expanding your Gs-RAM 
or GS-RAM Plus easy, convenient, and very 
economical For further expansion, you can 
plug a 2 MEG “piggyback” card into the Gs- 
RAM'’s expansion port for up to 3.5 MEG of 
total capacity. Or up to a whopping 8 MEG 
on GS-RAM Plus. If a Gs-RAM owner outgrows 
3.5 MEG, he can easily upgrade to Gs-RAM 
Plus for a nominal charge. 
Permanent Storage for an 
“Instant On” Apple 

With our RamKeeper”™ back-up option, 
your GS-RAM or GS-RAM Plus will retain both 
programs and data while your Ilcs is tumed 
off Now when you tum your Ics back on, 
your favorite software is on your screen in 
under 4 seconds! With RamKeeper you can 
divide your IIGS memory into part “electronic 
hard disk,” and part extended RAM. Even 
change the memory boundaries at any 
time—and in any way—you want Because 


“In quality, 
performance 
compatibility, 
expandability and 
support, Applied 
Engineering's GSRAM 
and oSRAM Plus are 


,. number one.” 


Steve Wozniak the creator 
of Apple Computer 


Applied Engineering has the most experience 

in the industy with battery-backed memory 

for the Apple, you are assured of the most 

reliable memory back-up system available. 

And in the word of battery-backed memory, 

Reliability is everything That’s why Applied 

Engineering uses state-of the-art “GEL-CELL's” 

instead of Ni-Cad batteries (if Ni-Cads aren't 

discharged periodically, they lose much of 

their capacity). RamKeeper has about 6 

hours of “total power failure” back-up time. 

Thats 6 times the amount of other systems. 

But with power from your wall outlet, 

RamKeeper will back-up Gs-RAM, Gs-RAM 

Plus, or most other IIGs memory cards 

indefinitely. Should you ever have a “total 

power failure,” RamKeeper switches to its 

6-hour battery. When power retums, Ram- 

Keeper will automatically recharge the battery 

to full power. RamKeeper incorporates a 

dualrate charger, status LE.D.’s, and ad- 

vanced power reducing circuitry. RamKeeper 

comes complete with battery, software, and 

documentation. 

GS-RAM’s Got it ALL! 

e 5-year warranty — parts & labor 

e 6 RAM banks (most cards have 4) 

e Memory expansion port 

e ROM expansion port 

e Ulta-fast disk caching on ProDOS 8 AND 
ProDOS 16. 

e Expands AppleWorks intemal limits 

e Includes hi-res self test 

e No soldered-in RAM chips 

e Expandable to 8 MEG 

e No configuration blocks to set 

e RamKeeper back-up option allows 
permanent storage of programs & data 

e 15-day money-back guarantee 

e Proudly made in the USA 


Gs-RAM with 256K 
Gs-RAM with 512K 
GS-RAM with 1 MEG 
Gs-RAM with 1.5 MEG 


GS-RAM with 2.5 to 3.5 MEG 
GS-RAM Pius with 1-8 MEG 
RamKeeper Option 


Order today! 

See your dealer or call Applied Engineering 
today, 9 am to 11 pm 7 days. Or send 
check or money order to Applied Engineering. 
MasterCard, VISA and C.O.D. welcome. 

Texas residents add 7% sales tax. Add $10.00 
outside USA 


HE.” APPLIED ENGINEERING” 


The Apple enbancement experts. 
(214) 241-6060 


P.O. Box 798, Carrollton, TX 75006 
Prices subject to change without notice. 


Gs-RAM, Gs-RAM Plus and RamKeeper are trademarks of Applied Engineering Other brands and product names are registered trademarks of their respective holders. 


Apple Assembly Line.....April, 1988.....Copyright (C) S-C SOFTWARE.....Page 1] 


me ek ek me el eh ee ee ek ek ak ek ek ek ed tb eb ed dk 
OD OWOWOWOWDO OD] ODO OOWDOWOWODowowoww www 


B2- 
B5- 


BC- 
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C0- 
C2- 
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KC 45 1A 


CD 13 OF 


19 
4C 36 19 


JMP 


#$0D is it RETURN? 
-not RETURN 
SML. RETURN 


#$0B up arrow? 
SML.UP. ARROW 

#$0A down arrow? 
ot ale - ARROW 


? Apple and "?" 
-« question mark 
ae t digit, b ! 
2~2.no git, beep 
of 
: ---not digit, beep! 
#$0F 


LAST.LINE. NUMBER. OF. MENU 

| --.bottom line 

.6 ... beyond the bottom, beep! 

save the digit typed 
CHAR .FROM.KEYIN 
DISPLAY. TOKEN .X 
MAKE.MENU . LINE. NORMAL 
get digit typed again 

Aan -LINE. SSELEC ED select line 1-9 


SHOW .ESCAPE.AND.HELP.MSGS 


pi i cherhine as 
_anaD p e=- e SSeS @ee ee @ eee @ene 
5 . LDA Z. ub 


why? opcode JMPed to is LDA also! 
SML. ESCAPED. WITHOUT. INVERSE 


JSR 
BNE 


BEEP . AND. CLEAR .KEYBUF 
1 eee always 


: (198B) 1952 19EF 
SML.UP. ARROW 


JSR 
DEC 
BNE 
LDA 
STA 
JMP 


MAKE.MENU .LINE. NORMAL 

MENU . LINE. SELECTED 

ol -.. Still in range 
LAST.LINE. NUMBER .OF.MENU 
MENU . LINE. SELECTED 
SML.WAITING 


: (1998) ee 19F9 


SML . DOWN 


ANAKE. MENU .LINE. NORMAL 
MENU .LINE. SELECTED 
LAST.LINE. NUMBER. OF.MENU 
1 ...- already on bottom, wrap to top 
MENU. ~LINE. SELECTED next line down 


. - always 
#1 top line now 
MENU . LINE LECTED 


SML.WAITING 


® (19AF) 197E 
SML.DIGIT 


1 


MAKE.MENU .LINE. INVERSE 
MOVE.CURSOR.TO.TCOL.TROW 
#$07 CURSOR RIGHT TOKEN 
DISPLAY. TOKEN .X 


MENU . LINE. SELECTED 
P #10 


on line 1-9? 
2 ~ipder 
#$07 CUR oe RIGHT TOKEN 
AW. KEYIN get another char, maybe 2nd digit 


# s it ESCAPE? 

: oo yes 

#$08 

‘ »-. backspace 

#$7F ~--is it DELETE? 

e eee YES 

Zz. AY 

SML.ESCAPED 
RESTORE. ESCAPE. AND. HELP.MSGS 
SML.WAITING 
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O10) Wecwemee ete ee eee ee 
19DE- C9 OD 4020 24 CMP #$0D is it RETURN? 
19EO- DO 06 030 BNE . ..-no 
19E2- 20 OC 19 3040 JSR RESTORE.ESCAPE.AND.HELP.MSGS 
19E5—= HC 45 1A 3° 7 ‘ JMP SML. RETURN 
19E8= C9 OB 3070 .5 CMP a308 up arrow? 
19EC- 20 OC 19 3090 JSR RESTORE. ESCAPE.AND.HELP.MSGS 
19EF- 4C 8B 19 ee z JMP SML.UP. ARROW 
19F2- C9 OA 120 .6 CMP #$0A down arrow? 
19F6- 20 OC 19 3140 JSR RESTORE. ESCAPE.AND.HELP.MSGS 
19F9= 4C 9A 19 3126 P JMP SML.DOWN. ARROW 
19FC- C9 30 3170 7 CMP #$30 another digits 
1A00- C9 3A 3190 Sigssk Coen eee eens 
1AOH—- 48 3210 PHA save the digit 
1A05- A6 8C 3220 LDX MENU .LINE. SELECTED 
1A07= AO OA 3236 LDY #10 mu Ee a previous line# by 10 
1A09- 20 3A 1B 3240 JSR MULTIPLY.X 
MODE A ne 35 Rup #30F add the new digit 
1A0F- 270 CLC 
1A10- és 91 280 ADC Z.91 product here 
1A12= BO 1 290 BCS .10 -..-too large, beep! 
1A14= CD 3 OF 3 00 CMP LAST. LINE. NUMBER. OF. MENU 
1A1T= FO 02 310 BEQ .8 --- bottom line 
1A19= BO 12 3 20 BCS .10 -..too large, beep! 
1A1B- 48 330 8 PHA save the new line number 
1A1C= A6 84 0 LDX CHAR.FROM.KEYIN 
1A1E= 20 EQ 1F 50 JSR DISPLAY. TOKEN .X 
1A21=- 20 E4 18 3360 JSR MAKE.MENU. ann NORMAL 
1A24- 68 3370 PLA get the new line number 
1A25- 85 8C 0 STA MENU.LINE. ea 
MK: £2 £8 1$ $285 4 JRB MAKE-MENU co Z0vense 
3410 #------- ee eee 
1A2D=- 20 18 18 3420 .10 JSR BEEP. AND.CLEAR .KEYBUF 
1A30- DO F8 310 2 BNE .9 --- always 
370 Sit necinee 1946 19D6 
1A32~- 12 AX 3170 re Z. AY 
1TA34—- 4 480 PHA 
1A35—- AQ 00 130 LDA #$00 
1A37—- 85 A4 500 STA Z.A4 
7 ie 20 EX 18 206 yen MAKE. MENU . LINE. NORMAL 
1A3D—- 85 A 3530 STA Z.A4 
32i0 # (1A3F) 192E 1983 
230 SML.ESCAPED.WITHOUT. INVERSE 
i A go 560 tl #$00 
1A41- 8 C 24° NU .LINE. SELECTED 
1A43- FO 1B 290 BEG CLEAR .MENU . TABLE. AND. EXIT oe ALWAYS 
3600 # Wee Lata 19E5 
3610 SML.RETU 
TAN5= 20 F5 1F 3620 on eye is Bare’ 23 
1A4B- 72 1A 3630 -DA I. 1AT2 Byte aman! Clear-Line Token 
TANA- 20 EY 3640 JSR MAKE.MENU. hi E.NORMAL 
1AND=- 20 DD 18 3026 JSR GET.MENU .TABLE. INDEX 
1A50=- BD B7 OE 3660 LDA MENU .TABLE+1,X 
1A53- A8 3670 TAY draw an arrow "-->" over number 
We - a B6 OE 36 : eax MENU . TABLE, X 
1A58=- 20 23 18 3760 JSR MOVE.CURSOR.TO. XY 
1A5B- 20 93 20 3710 ae heeog STRING. PO 
1A5E- 6D 1A 3720 cies 
eos k is CLEAR. 0) tA Me. AND. EXIT 
1A62—= A2 5E 20 LDX #3#31+1 entire table & highest line number 
Ue ap OE 70 1 art MENU .TABLE-1, 
1Aebe DO FA 13? BNE .1 
1A6A- A5 8C 3800 LDA MENU .LINE. SELECTED 
1A6C- 60 3810 RTS 
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1A6D- tty ARROW MSG ->" 
1AT2—= 01 02 : 0 T.1Al2 . ~HS 01. 02 1 BYTE STRING, CLEAR LINE TOKEN 
50 #-----------------------~---+----- 
3320 #  Re-display a screen line in INVERSE or NORMAL mode 
3870 sd Y) = screen line to be re-displayed 
3880 # X) = column number to begin with 
3890 # A) = 0 then re-display entire line NORMAL 
3900 # A) > 78 then redisplay entire line INVERSE 
3335 sd A) = length of middle section of line to be 
920 # displayed in INVERSE. 
3330 #8 ee en ee ee en ene ee enn ee 
1A74- 940 RASL.X .BS 1 
Vaten 3326 RASL.Y .BS 1 
1ATO0~- ora RASL.A .BS 1 
3340 # (1A77) 103F acEe 1908 
dite REVERSE. A.SCREEN .LINE 
1ATT- 8E 74 1A 0 STX RASL.X Save the column 
1ATA- 8C 75 1A 4010 STY RASL.Y Save the line 
he: 8D 76 1A 4020 STA RASL.A Save the length 
1A80- 98 4030 TYA get lin ne number 
1A81- 20 7A 18 4O4O JSR COPY.SCRN.LINE.TO.0900 
1A84- A2 00 4050 LDX #0 start in column 0 
1A86—- AC 75 1A 4060 LDY RASL.Y on line Y 
1A89- 20 23 18 4070 JSR MOVE. CURSOR. TO. XY 
1A8C- AD 76 1A 4080 LDA RASL.A get specified length 
1A8F- FO 09 4090 BEQ .1 ---Q0 means display it all NORMAL 
1A91- C9 UF 4100 CMP #79 
AaB 90 1C 4110 BCC edt Ne a length 
1A95—- A2 OA 4120 LDX #50A --.>78, INVERSE the line 
VReAe 20 E9 IF fie JSR DISPLAY. TOKEN.X. 
1A9A- AD FA 1A 4140 .1 LDA HANDLE. 0900 
1A9D=- 85 80 4150 STA PSTR 
1A9F- AD FB 1A 4160 LDA HANDLE. 0900+1 
1AA2—- 85 81 ake STA PSTR+1 
TAAK- AQ AF 4180 LDA #79 isplay 79 characters 
1AA6=- 20 D1 14 4190 JSR DISPLAY. STRI 
1AA9- A2 OB 4200 LDX #$0B NORMAL TOKEN 
1AAB- 20 EQ 1F 4210 JSR DISPLAY. TOKEN .X 
1AAE- 4C FO 1A eae ‘ JMP .3 ~ee ONLY AN RTS 
1AB1= AD FA 1A 4240 .2 LDA HANDLE. 0900 Point to line image 
1ABH- 85 80 4250 STA PSTR 
1AB6- AD FB 1A 4260 LDA HANDLE. 0900+1 
1AB9~ 85 81 4270 STA PSTR+1 
1ABB- AD 74 1A 4280 LDA RASL.X Display up to X in NORMAL 
1ABE- 20 D1 14 4290 JSR DISPLAY. STRING 
1AC1= A2 OA 4300 LDX #$0A INVERSE TOKEN 
Meee 20 EQ 1F 4310 JSR DISPLAY. TOKEN .X 
1ACO— AD f 1A 4320 LDA RASL.X Display middle section INVERSE 
1AC9- 85 80 1386 STA PSTR 
1ACB- AD FB 1A 4340 LDA HANDLE. 0900+1 
1ACE- 85 81 4350 STA PSTR+1 
1ADO- AD 76 1A 4360 LDA RASL.A # chars in middle section 
Le 20 D1 14 4370 JSR DISPLAY.STRING 
1AD6= A2 OB 4380 LDX #$0B NORMAL TOKEN 
1AD8- 20 EQ 1F 1330 JSR DISPLAY. TOKEN .X 
1ADB—- AD 74 1A 4400 LDA RASL.X Display rest of line NORMAL 
1ADE- 18 4410 CLC 
1ADF~ 6D 76 1A 4420 ADC RASL.A 
1AE2- BO 15 4430 BCS .3 --- line too long, forget the rest 
TAE4- CQ 4F ete CMP #79 
1AE6- BO 11 4450 BCS .3 .-eline too long, forget the rest 
1AE8—- 85 80 4460 STA PSTR 
1AEA- AD FB 1A 4470 LDA HANDLE. 0900+1 
IAEF- AQ WEY TDA #79) 79 ch 
- chars 
1AF 1- 4 neh SEC 
1AF2=- E5 80 4510 SBC PSTR 
1AF4- FO 03 4520 BEQ .3 O space left on the line 
1AF6—- 20 D1 14 1239 JSR DISPLAY. STRING 
1AF9- 60 2 : 3 RTS 
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2084- 9D FF 09 


208B- 20 AQ 1E 
208F- 20 D1 14 


Feeerrereee 
WDD OW0u0D Ow) 
Pt ae N= 

eleleleleleajlol a) 


5000 


Display string P2 at PO,P1 after "xx. " 


where xx is decimal form of (LAST.LINE.NUMBER.OF.MENU ) 


LAST.LINE.NUMBER.OF.MENU is incremented by this routine 


r 
# 
% 
sd Stores 3 bytes in MENU.TABLE: 
# column, line, and string length 
sd MENU.TABLE has room for 31 such entries. 
DISPLAY .MENU .LINE 

JSR GET.4.PARMS Get PO0-P3 

INC LAST.LINE.NUMBER.OF.MENU 

#$05 "GO TO XY" TOKEN 
STA STR.AOO 


LDA LAST.LINE.NUMBER.OF.MENU 
JSR CONVERT.A.TO.RJBF. STRING 


STX STR.A00+ blank or first digit of ## 
STY STR; A00+ units digit of ## 

STA STR.A00+5 string is "##. " 

LDA #' ! 


STA STR.A00+6 

STA STR .A00+7 

LDA LAST.LINE.NUMBER.OF. MENU 
ASL multiply by 3 
ADC LAST.LINE. NUMBER. OF. MENU 


TAX save for index into MENU.TABLE 
#--Column numberen<<-<---------- 
LDA PO Get specified column 
BPL .1 ~e-e-it is absolute 
ie #$7F ..eit is relative 
ADC MENU .CORNER.LEFT 
1 STA STR.AO0+1 Put column # into string 
STA MENU .TABLE,X and save in table 
#---Line numbere------ nee en eee 
LDA P1 Get specified line number 
BPL .2 ---it is absolute 
ae #$7F ..-it is relative 
ADC MENU .CORNER.TOP 
ee STA STR.A00+2 Put line # into strin 


STA MENU.TABLE+1,X and save in table 
sr armppene text of menu line----- 


#0 
LDA (P2),Y Save length of string in table 
STA MENU .TABLE+2,X 


TAY Point at last char in string 

CLC Compute yt a of combined strings 

ADC #8 05.xx. "##. " = 8 chars 

TAX Point at last char of combination 

PHA Save total length for display subr. 
3 LDA (P2),Y get next char of caller's string 

STA STR.A00-1,X append to ours 

DEX 

DEY 


BNE .3 ‘ 
non DASE Lay the string----------- 


PLA Get length off stack 
aan DISPLAY.STRING 


~PH $146A 
MENU.MSG OMSG "Type number, or use arrows, then press Return 
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In about the time it takes 
to read this headline, 
you can have the Finder 
up and 


w your favorite program 
Ne be ready to go seconds 
after you flip your Apple 

IIGs on. 

With Applied Engineering’s 
RamKeeper™ card, your IIcs 
retains stored programs and data 
when you turn your computer off. 

RamKeeper powers up to two 
memory cards simultaneously 
when your Apple Ilcs is off. And 
battery backup keeps power to the 
boards even during power failures. 
Your programs and data are stored 
in a permanent, “electronic hard 
disk,” always ready to run. 


Superior power backup. 
Applied Engineering has the 
most experience in battery- 


Ramkeeper lets you keep programs and 
data in permanent, “electronic hard 
disk” memory. Turn your Apple Has on 
and you're ready to work. 


backed memory for Apple com- 
puters. We were the first to offer 
battery-backed memory with our 
RamFactor™/RamCharger™ 
combination. Now RamKeeper 
sets the standard for IIlGs memory 
backup. 

Our experience shows in the 
way we designed and built 
RamKeeper. We used sealed Gel/ 


Cell batteries — far more reliable 
than Ni-Cads in this application. 
Ni-Cads lose much of their capac- 
ity if they’re not discharged 
periodically. Just when you need 
them most, Ni-Cads could run out 
of power. 

Our Gel/Cell pack, which is in- 
cluded in our price, gives you up 
to six hours of total power failure 
backup. That’s about 6 times 
longer than other systems. 


RamKeeper uses a Switching 
Power Supply — the same tech- 
nology used by Apple for the Ilcs 
power supply. This design uses en- 
ergy much more efficiently to 
keep your Apple running cooler. 


Our sealed Gel/Cell battery 
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Stays outside your com- 
puter case. With other sys- 
tems, the batteries are in- 
stalled under the IIcGs 
power supply where a leak 
could ruin computer 
circuitry. 

Put two memory boards 

in the same slot. 

You might have bought 
your IIcs with Apple's 
memory card. But now 
you want the features of 
Applied’s Gs-RAM™ card. 
RamKeeper efficiently re- 
solves the dilemma. 

You can use RamKeeper 
with your current IIGs 
memory card and add an- 
other memory card — all in the 
same slot. Just attach your current 
memory card to one side of your 
new RamKeeper card, connect the 
second card to the other side and 
plug RamKeeper into the slot. 

‘Of course RamKeeper works 
fine with just one memory card. 
But you can use two and still keep 
Slot 7 open with our optional 
Slot-Mover. 


Makes all of your memory 
usable memory. 
RamKeeper can power up to 16 
Meg of memory. Other systems are 
limited to only 8 Meg. In addition, 
RamKeeper lets you mix and 
match different types of cards. For 
example, you can have a Gs-RAM 
Plus™ using 1 Meg RAM chips and 
an Apple card using 256K RAM 
chips. Other systems are limited in 
the combinations they allow. 
RamKeeper firmware automat- 
ically configures for two cards 


RamKeeper is easy to install. Just plug it 
in. Even when you use two memory 
boards, you don’t have jumpers. You can 
have two memory boards but use only 
one slot. 


It all comes with RamKeeper ... board, 
Gel/Cell battery pack. easy-to-under- 
stand instructions, and Applieds power. 
ful AppleWorks Expander software. 


when the second card is installed. 
Other systems make you manually 
move jumpers. 

RamKeeper configures memory 
linearly. Other systems don't, so 
they create memory gaps that can 
cause program crashes or keep 
some programs from using as 
much as half of your memory. 


You easily decide how much 
memory you'll devote to ROM and 
to RAM from the IIGs Desk Ac- 
cessories menu. You can configure 
Kilobtyes or Megabytes of instant 
ROM storage for your favorite pro- 
grams. And you can change ROM 
size any time without affecting 
stored files. 


Protected from program 
crashes. 

RamKeeper controlling firm- 
ware is in an EPROM. A pro- 
gram crash can’t take out the 
operating software. With 
other systems, operating 
software is installed in 
RAM from a floppy. Lf the 
program crashes, it can 
take the operating soft- 
ware with it; and reinstall- 
ing the disk-based operating 
software destroys data in memory. 


Verifies data security. 
RamKeeper firmware uses op- 
tional startup checksums to verify 
that no data has been lost while 
power was off. The firmware also 


runs ROM and RAM memory tests 
without disturbing data on the 
card. 


Free AppleWorks 
Enhancement 
software. 

Applied's powerful Apple- 
Works Enhancement 
software is free with 
RamKeeper. It makes 
AppleWorks faster and far 
more powerful by eliminat- 
ing AppleWorks internal 
memory limits. Word pro- 
cessor limits go from only 
7,250 lines to 22,600 lines. 
Database limits go from 
6,350 records to 22,600 
records. The clipboard size 
limit is increased from 255 to 
2,042 lines. It even automatically 
segments large files so you can 
save them on multiple floppies. No 
other company expands your IIcGs’ 
AppleWorks internal limits. 

In addition, the most powerful 
disk-caching program available 
comes with the RamKeeper. The 
cache significantly increases ac- 
cess time to the Apple 3.5 Drive. 
Most applications will run up to 7 
times faster. 

The largest maker of Apple 
expansion boards. 

Applied Engineering has sold 
more expansion boards than any- 
one else. And we've been in busi- 
ness 8 years, long enough to see 
the vast majority of our com- 
petitors come and go. 

All of our products are crafted 
in the US.A. We back RamKeeper 
with a five year parts and labor 
warranty. And a 15-day, no ques- 
tions asked, money back 
guarantee. 


Only $189.00. 

See your dealer. Or call 
214-241-6060, 9 a.m. to 11 p.m. 
7 days. Or send check or money 
order to Applied Engineering. 
MasterCard, VISA, C.O.D. wel- 
come. Texas residents add 7% 
sales tax. Add $10.00 outside 
U.S.A. Prices subject to change 
without notice. 


AC. APPLIED ENGINEERING” 


The Apple enhancement experts. 
PO. Box 5100 ¢ Carroliton, Texas 75011. 
(214) 241-6060 


RamKeeper, RamFactor, Gs-RAM, and Gs-RAM Plus are trademarks of Applicd Engineering. 
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ProDOS File TranSfOrmMer...ccccccccecrecveceee- BOD Sander-—Cederlof 


Have you ever wanted to convert a file from one filetype to 
another? I have, and it seems that there should be a command 
in BASIC.SYSTEM to allow it. Some other command shells, such 
as Davex by DAL Systems, do have such a command. 


Of course, the flexibility of the BLOAD and BSAVE commands does 
allow you to get the job done. You can BLOAD the source file, 
specifying the filetype and load address; CREATE an empty file 
of the new type; and BSAVE into that new file, specifying the 
filetype, beginning RAM address, and length. 


But what if you want to go just a little further, and also make 
some slight changes to the file's contents? Then you need an 
intelligent file transformer. You need a program that will ask 
for an input and an output pathname, read the input file and 
transform the data appropriately, and write the transformed 
data on the output file. This article presents a specific file 
transformer, and you may either use it as is or modify it to 
your own needs. 


I have often been asked, by programmers who did not own the S-C 
Macro Assembler, for a program which would convert S-C source 
code files into ordinary text files. Back in the December, 
1983, issue of Apple Assembly Line I published such a program, 
but it was written in Applesoft for running under DOS 3.3. I 
don't believe that program would operate properly under ProDoS, 
but even if it did it would be terribly slow. 


Under DOS 3.3, S-C source code is stored in type “I" files. 

DOS does all the actual LOADing and SAVEing, being fooled into 
believing that the source code is Integer BASIC. Under ProDoS, 
S-C source code is stored in type SFA files, which Apple has 
set aside for Integer BASIC source programs. Since Integer 
BASIC has never been supported under ProDOS, and probably never 
will be, I chose to use this file type for S-C source code. In 
fact, when you are using the S-C Macro Assembler this filetype 
is called “S-C", 


The source code text is stored in a slightly compressed format 
in these files. The same format is used for both the DOS and 
ProDOS versions, so that you can use Apple's CONVERT program or 
a utility like COPY II PLUS to move files from one operating 
system to the other. If you were to read a file byte-by-byte 
under both operating systems, you would notice one difference: 
under DOS the file's length is stored in the first two bytes; 
under ProDOS the length is kept in the directory. 


Each line of S-C source code begins with a line number. This 
number may be any value from 0 to 65535. The transformer 
should write the source lines on the output text file without 
this line number, because most assemblers uSing text files for 
source do not use explicit line numbers. 
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Each line of S-C source code is stored in the file in a form 


first defined by Steve Wozniak's Integer BASIC: 


byte 1: number of bytes in entire line (n) 
byte 2: lo-byte of line number in binary 
byte 3: hi-byte of line number in binary 

bytes 4...n-l: tokenized form of source line 
byte n: 00 


For example, an empty line with line number 1000 would be 
stored as: 


04 E8 03 00 


The tokenized form of S-C source is almost plain ASCII. Each 
byte is stored in ASCII with bit 7 zero, with two exceptions. 
First, blanks are stored in a compressed form. One blank is 
stored with the code $81; two blanks are stored with the single 
code $82; in general, a string of n consecutive blanks is 
stored with the single code $80+n. The largest compressed 
blank code is SBF, which stands for 63 consecutive blanks. If 
there are more than 63 blanks in a row, they will be 
represented by two or more compressed-blank codes. For 
example, the line 


1010 STAR LDA #0 Zero 


would be stored as: 


14 number of bytes in line = 20 
F2 03 line number is $03F2 = 1010 
53 54 41 52 “STAR" 

83 three blanks 

4C 44 41 81 "LDA " 

23 30 85 "#0 . 

5A 65 72 6F “Zero" 

00 end of line token 


While blank is the most frequently repeated character ina 
source program, there are others. The token $C0O, followed by a 
repetition count and an ASCII character, represents any string 
of the same character. For example, the line 


would be stored as: 


08 8 bytes in line 

FC 03 line number 1020 

2A ign 

CO 20 2D means 32 consecutive "-" 
00 end of line 


With the above information, you can see that the file 
transformer will have to read in the first byte of each line, 
which tells how many bytes are in the rest of that line. Then 
it should read in the rest of that line. Once the entire line 
is in RAM, the transformer should scan through the bytes of the 
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line, copying ASCII characters to the new line, and expanding 
any compressed characters into the new line. Finally, the new 
line should be written on the output file. When the 
transformer reaches the end of the input file it is finished. 


Let me insert here a reminder that even though this transformer 
is very specific, you should be able to easily modify it to 
handle other types of transformations. For example, the 
subscriber data base I use to produce mailing labels every 
month is kept on a series of plain text files, understandable 
only to the mailing list program I wrote about eight years ago. 
Even though it is plain text, AppleWorks cannot read it into a 
structured database unless I make some “transformations" first. 
At a minimum, I need a transformer that will split the city, 
state, and zip code line into three separate lines. I could 
eaSily write such a transformer by modifying the following 
program a little. Another transformer could read a binary file 
and write out a text file in the Intel or Motorola hex format, 
for later transmission through a serial port to an EPROM 
programmer. The possibilities are endless. 


Now back to the program ALREADY written. I wrote two versions, 
and you can assemble either one of them by changing line 1060. 
As shown here, the fancier version is selected. The simpler 
version assumes specific filenames assembled into the code in 
lines 4340-4480. The fancier version prompts for filenames or 
pathnames to be typed in when you run the program. The code 
for both versions is listed, but only the fancy version was 
actually assembled. 


Lines 1200-1400 define four macros I used in the program. The 
first one is for calling the ProDOS Machine Language Interface, 
or MLI. The second one creates a call to a subroutine which 
prints 00-terminated strings, followed by the string to be 
printed. The third generates a call to a subroutine which 
prints strings which begin with a byte count. The fourth 
generates calls to a subroutine which reads a line from the 
keyboard into a specified buffer, and then stores the length in 
the first byte of the buffer. 


It turns out I do not use both the PRSTR and RDSTR macros, just 
one or the other. In the simple version, PRSTR is used to 
display the pre-assembled filenames; in the fancy version, 
RDSTR is used to let you type in the filenames. 


Lines 1450-1550 call on two subroutines to open the input and 
output files. If they are successful, the file reference 
numbers returned by MLI will be stored into parameter blocks 
for reading and writing those files. If not, the transformer 
program will just close all files and end. I'll discuss the 
two opening subroutines later. 


I decided after a few tests that I wanted some sort of progress 
indication on the screen while the program was busy. I decided 
to list the line number on the screen. Line 1570 uses the 
PRINT macro to display "LINE NUMBER: ". Inside the main loop, 
at line 1680, I call DISPLAY.LINE.NUMBER to display the current 
line number in five-digit decimal, and then backspace 5 times. 
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This makesS a very attractive (to me) indicator. Ina more 
general transformer, you might change this to display a 
hexadecimal file position, or some other meaningful parameter. 


The main loop runs from line 1590 to line 1790. First lines 
1590-1620 try to read three bytes. If there is any error, I 
assume it is due to reaching the end of the source file, and 
that ends the loop. If no error, then the input buffer 
contains the byte count for the whole line, and the line 
number. Since we already read the first three bytes, lines 
1630-1670 compute the number of bytes left in the line and set 
up the parameter block to read that many. Then I print out the 
line number as described above. The DISPLAY.LINE.NUMBER 
subroutine also checks to see if any key has been pressed on 
the keyboard, which is interpreted to mean you want to abort 
the tranformer. Line 1690 branches in that case, and the files 
are closed. Lines 1700-1710 read the rest of the source line. 


Line 1730 calls the CONVERT.ONE.LINE subroutine, which scans 
the source line and builds an expanded output line. Lines 
1740-1780 write the expanded line on the output file. Any 
error returned by MLI from this write ends the main loop. 
Probably I should have printed out an error message for this 
condition, because it is abnormal. It could happen if you were 
trying to write into a write-protected file or ona 
write-protected disk. Looking at it now, I think I would 
change line 1780 to "BCS .4", and insert the following lines: 


1862 .4 JSR OPEN .ERROR 
1864 >PRINT “\UNABLE TO WRITE ON OUTPUT FILE" 
1866 RTS 


Once the main loop ends, lines 1800-1820 truncate the output 
file. It may be that your output file already existed, and was 
longer than necessary to contain the new information. These 
lines chop off any extra data. Line 1810 reads the current 
file position, and line 1820 sets that value as the new 
end-of-file. Finally, line 1840 closes both files. 


I ended the program with a simple RTS. You might want a 
fancier ending. For example, you might want a message on the 
screen saying "I AM FINISHED" or the like. Then you might want 
a short menu on the screen allowing a choice of transforming 
another file, ending with an RTS, or doing a ProDOS QUIT call. 
See, I left something for you to do! 


If you do start adding features, you might also like to add the 
ability to transform a range of lines from the source file, by 
specifying a beginning and ending line number. You might want 
to add tests for the correct file types on the input and output 
files. You might want to add a menu-style pathname entry, so 
that you could work with complicated directory structures 
without a photographic memory. 


That last suggestion leads me to warn that the program given 
here requires that you enter complete pathnames, or else have a 
legitimate prefix set. It does not allow slot and drive 
specification using ",Sx" or ",Dx"“ either. Now don't let me 
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discourage you by listing all the things I left out. As is, 
the program is quite useful. 


Lines 1870-1970 are the subroutine to open the input file. It 
first prints the prompt message "INPUT: ", and then waits for 
you type in a pathname. (If you selected the "simple" version, 
it instead prints out the pre-assembled pathname.) Line 1950 
calls on ProDOS to open the file. If there is any error, lines 
1990-2050 print out the error number and the subroutine returns 
with carry set. If there is no error, the subroutine returns 
with carry clear. You might want to add some code to this 
subroutine to read the filetype and make sure it is type SFA. 


Lines 2070-2270 open the output file. This is a little more 
complicated, because the output file may or may not already 
exist. If the file does not yet exist, the open call will 
return with error number $46. Line 2160 tests for this error 
number. Any other error will be printed out, and the 
subroutine will return wiht carry set. Lines 2180-2260 attempt 
to CREATE a file. First the current date and time are read and 
stored in the parameter block, and then ProDOS is called to 
create the file. The parameter block used here assumes you 
want the output file to be type TXT ($04). If you modify the 
program for a different transformation you may want to change 
the file type. You might also want to add some code to check 
an existing file for the correct file type. 


Lines 2290-2510 are the parameter blocks for the various MLI 
calls I used. 


Lines 2560-2830 display the current line number and test for a 
keypress. The subroutine converts the binary line number to 
decimal one digit at a time. Nothing spectacular, and in fact 
it is very similar to the subroutine Woz used inside Integer 
BASIC over ten years ago. Lines 2740-2780 send out five 
backspaces to put the cursor back over the first digit. I 
Originally tried to do this by just storing a cursor position 
back in location $24, but that only works in 40-column mode. 
Using backspaces it also works in 80-column mode, even with the 
80-column cards used in Apple II+ machines. Lines 2790-2830 
check for a keypress and return carry set if there was one. 


Finally to the heart of this transformer: lines 2870-3330 
convert one input line into one output line. Lines 2950-2970 
zero two pointers, one for the input line scan and the other 
for the output line fill. These are used by the GET.CHAR and 
PUT.CHAR subroutines in lines 3180-3330. GET.CHAR picks up the 
character pointed to from the input line, and advances the 
pointer. PUT.CHAR stores the character in the A-register into 
the output line where the pointer points, and then advances the 
pointer. PUT.CHAR.MULTIPLE uses the X-register to store 
Multiple copies of the character in the A-register. 


Lines 2980-3000 pick up the next character from the input line, 
and branch according to its type. If the character is 00, this 
is the end of the line: then lines 3150 tack an ASCII <RETURN> 
code on the end of the output line, and the subroutine is 

finished. If the character is positive, it is simple ASCII and 


lines 3010 simply copy it to the output line. If the character 
is negative, it is either a compressed blank string or a 
compressed string of some other character. Lines 3030-3090 
handle compressed blanks by putting the blank count into the 
X-register, a blank in the A-register, and calling 
PUT.CHAR.MULTIPLE. Lines 3100-3130 handle the other kind of 
repeated character by reading the repeat count and character 
code from the input line and then calling PUT.CHAR.MULTIPLE. 


Lines 3340-3550 are very similar in function to the PRINT 
subroutine I published last month in my SHOW INDEX program. A 
difference is the use of the "\“ character in the string. Last 
month's program would have merely printed the "\". The program 
this month will print a <RETURN> when it sees a "\". This 
enabled me to use the PRINT macro to generate calls to the 
PRINT subroutine. 


Lines 3560-3830 are a subroutine for printing strings which 
begin with a length byte. This subroutine is not ever called 
in the fancy version of my program given here. In the simple 
version it would be called to print the pre-assembled 
pathnames. I went ahead and assembled the subroutine anyway, 
because it is an interesting one. The macro PRSTR will call 
it, putting the address of the string to be printed as data 
immediately after the JSR PRSTR. 


The subroutine used in the fancy version to read in a pathname 
is given in lines 3870-4250. The address of the buffer for 
receiving the pathname is given as data following the JSR 
RDSTR. Lines 3880-4010 accomplish the task of copying this 
address into the code below, into lines 4150 and 4240. Where 
the listing shows $3333, the address of the buffer will be 
stored. The loop in lines 4030-4210 keeps reading characters, 
storing them into that buffer, and displaying them on the 
screen. 


If a backspace is read, the character at the end of the buffer 
is backed out and the string backspace-space-backspace is 
displayed on the screen. When a <RETURN> is read, the loop 
terminates and the number of bytes before the <RETURN>D is 
stored in the first byte of the buffer by lines 4200-4250. 


The subroutine GET.VIA.PNTR in lines 4270-4320 is called by 
both PRSTR and RDSTR to pickup the address which follows the 
JSR calling those subroutines. 


Lines 4340-4480 either assemble two 65-byte buffers (fancy 
version) or two pathnames. Lines 4490 to the end assemble the 
other buffers used. Since the buffers used by ProDOS for the 
open files must begin on a page boundary, line 4530 skips ahead 
to the next page boundary. 


For those of you who do not own the S-C Macro Assembler, I will 
start including this file transformer in executable form on 
future issues of the AAL Monthly Disk. Remember, you can save 
yourself a lot of typing by subscribing to the Monthly Disk. 
These disks include all of the source code in S-C format and 
also the text of all of the articles. 
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O1- 


FDOC- 
FD8E- 
FDDA- 
FDED- 


BF90- 


C000- 
C010— 


00- 
01- 


1000 ®SAVE SC.2.TEXT 
1020 an tine missing above was ".LIST MOFF,CON" 


1030 #&-------- -- ee ee 
i ; : ~OR $2000 
ie ; FANCY .EQ 1 =0 to use pre-assembled file names 
1070  Bacecaeeeeccceesece ts eocu eee ce eS 
1080 RDKEY .EQ $FDOC A few handy Monitor subroutines 
1090 CROUT .EQ $FD8E 
1100 PRBYTE .EQ $FDDA 
1110 COUT .EQ $FDED 
1120 &-------- ee eee eee 
ie MLI.DATE -EQ $BF90 thru BF93 System DATE and TIME 
1150 KEYBOARD -EQ $C000 For aborting a conversion run 
ioe STROBE -EQ $C010 
1160 PIN -EQ $00 Scanning pointer for input line 
Ae POUT -EQ 301 Stuffing pointer for output line 
1210 ~MA MLI 
1220 JSR perce 
1230 -DA #$]1,J2 
1350 #------ 
1520 ~MA PRINT 
ihe JSR PRINT Print 00-term'd string after 
1280 eAS =" 31" here is the string 
1290 ~HS 00 here is the 00-terminator 
1300 . EM 
1310 #------ ee ee ee eee + 
1320 ~MA PRSTR 
13ho JSR PRSTR Print string beginning with byte count 
1340 -DA }1 address of string 
1360 #——--—-- 
1370 -MA RDSTR Read a string from keyboard or EXEC 
13380 JSR READ.STRING 
1390 -DA J1 address of string 
1400 : 
WO Oisecses Rose ewe cutee sc esacses 
1420 * Program to read an S-C Macro source file 
vie : and write it as a text file. 
Mae FILE. TRANSFORMER 
20 78 20 1460 JSR OPEN.INPUT.FILE Open Source File 
BO 2 aie BCS . --.unable to open it 
F4 20 1480 LDA IREF Get RefNum for READ 
8D FC 20 yage STA IOB. READ+1 
1500 #---Open the text file----------- 
20 A8 20 1510 JSR OPEN .OUTPUT.FILE 
BO 5E 1520 BCS .3 ».e-unable to open it 
AD FA 20 Pet LDA OREF Get RefNum for WRITE 
8D OC 21 1540 STA IOB. EOF+1 and for Truncation 
8D O4 21 1550 STA IOB.WRITE+1 
1560 #---Print "LINE NUMBER "---------- 
1245 >PRINT "\LINE NUMBER: ®" for progress indicator 
1580 #---read byte count from source file 
AQ 03 1930 1 LDA #3 read 3 bytes: byte count + line # 
8D FF 20 1600 STA IOB. READ+4 
1610 >MLI CA, IOB. READ 
BO 29 1620 BCS . END OF FILE 
16 30 #---read rest of line from source file 
38 1640 SEC rest of line is 3 less 
aD pS 22 1650 LDA raat than byte count 
8D FF 20 1870 STA IOB. READ+4 
20 12 21 1680 JSR DISPLAY.LINE.NUMBER to indicate progress 
BO 1B He BCS . -e- wants to abort 
1700 >MLI CA,IOB. READ 
BO 13 1710 BCS .2 END OF FILE 
1720 #---Build Output Line------------ 
20 5A 21 as ee JSR CONVERT .ONE.LINE 
1740 #---write line on text file------ 
A5 01 1750 LDA POUT 
8D 07 21 1760 STA IOB.WRITE+4 # BYTES TO WRITE 
Th >MLI CB, IOB.WRITE 
BO 03 1780 BCS .2 
4C 2C 20 1790 JMP .1 
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1800 #---truncate text fil e----------- 
2062- 1810 .2 >MLI CF,IOB.EOF GET MARK 
206 8- 1820 SMLI DO,IOB.EOF § SET EOF 
1830 #---Close both files------------- 
206E- 1840 .3 MLI CC, I0B. CLOSE 
2074- 20 8E FD 1850 JSR CROUT 
207T- 60 1860 RTS 
1870 Osnhe se eee sek be dese aes 
1880 OPEN .INPUT.FILE 
2078- 1890 SPRINT "\ INPUT: "® 
1900 .DO Y 
2086- 1910 >RDSTR PATHI 
1920 .ELSE 
1930 >PRSTR PATHI 
19h0 FIN 
208B- 1950 >MLI C8, IOB. OPENI 
2091- BO 01 1960 BCS OPEN.ERROR 
2093- 60 1970 RTS 
1900. S2Sesoee 2 Sect eces eee ececstecceus 
1990 OPEN.ERROR 
2094- 48 2000 PHA 
2095- 2010 >PRINT "\ERROR: * 
20A2- 68 2020 PLA 
20A3- 20 DA FD 2030 JSR PRBYTE 
20A6- 38 2040 SEC 
20A7- 60 2050 RTS 
S0b0 Sseec cece a eeccd seececeseu eet ec eo 
2070 OPEN.OUTPUT.FILE 
20A8- 2080 >PRINT "\OUTPUT: * 
2090 .DO FANCY 
20B6- 2100 >RDSTR PATHO 
2110  .ELSE 
2120 >PRSTR PATHO 
2130 .FIN 
20BB- 2140 .1 >MLI C8, IOB. OPENO 
20C1- 90 1F 2150 BCC . 
20C3- C9 46 2160 CMP #346 was it FILE NOT FOUND? 
20C5- DO CD ~—_- 2170 BNE OPEN.ERROR 
20C7- 2180 >MLI 82,0 
20CD- AO 03 2190 LDY #3 
20CF- B 9 BF 2200 .2 LDA MLI.DATE,Y 
20D2- 2 B 20 2210 STA I0B.CREATE+8, Y 
20D5- 2220 DEY 
20D6- 10 F7 2230 BPL .2 
20D8- 22K0 >MLI CO,IOB. CREATE 
20DE- 90 DB--—_—«a2250 BCC . 
20E0- BO B2 ~==2260 BCS OPEN.ERROR 
20E2- 60 22 0 3 RTS 
20E3- 0 2290 IOB.CREATE .HS 0 
20ER- 95 22 +2300 -DA PATHO 
20E6- C3 04 00 
20E9- 00 01 00 
20EC- 00 00 00 2 0 . -HS C3.04.0000. 01.0000. 0000 
20EF- 0 2330 IOB.OPENI .HS 03 
20FO- 54 22 2340 -DA PATHI 
20F4- 2 60 IREF -BS 
20F5- 03 2380 IOB.OPENO .HS 03 
20F6- 9 22 2390 -DA PATHO 
20F8- 60 29 2400 -DA BUF.O 
20FA- 2410 OREF .BS 1 
DNO0' Beeteeetaceccceese es eesedeeescees 


20FB- O04 00 a IOB. READ ar ee 
e 0 e 


20FF- 00 00 2850 DA 
2101- 00 00 2460 .DA 0 
ONTO Stecasetece noah betes oeue cle 
2103- 04 00 2480 IOB.WRITE .HS 04. 
2105- D6 23. = 2490 .DA LINE. TEXT 
2107- 00 00 2500 DA 
2109- 00 00 2510 .DA 0 
9520: @eveceomececcuc ncecseudcueecsess 


210B- 02 00 00 
IOB.CLOSE .HS 01.00 
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2- 


MPOPOPORD ROR P PP PPD POP PP 
cometh eh wee ech ce cee cee ee eth ee eh ee we we 


WANT Lee reefrwu) 


AO NOMS POR PORNO POPP POA POND POP PO PO POP fo 
ce wee ce ed we ee ee ed ce cee we we cee we ed ee eed ed od ed ed od 
C000 09 0000599999 I AADNHAAARHAQANSTU 
oe de A ee ee 
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64 
00 


22 


2560 DISPLAY. LINE.NUMBER 
2570 LDY #4 
2580 .1 LDX #"0" 
2590 .2 LDA LINE.SC+1 
2600 CMP DECTBL ,Y 
2610 LDA LINE. SC+2 
2620 SBC DECTBH,Y 
26 30 BCC .3 
2640 INX 
2650 STA LINE.SC+2 
2660 LDA LINE.SC+1 
2670 SBC DECTBL ,Y 
2680 STA LINE. SC+1 
2690 JMP .2 
2700 .3 TXA 
2710 JSR COUT 
2720 DEY 
2730 BPL .1 
2740 LDY #5 
2750 LDA #$88 
2760 .4 JSR COUT 
2770 DEY 
2780 BNE .4 
2790 LDA KEYBOARD 
2800 CMP #$80 SET CARRY IF ANY KEY 
810 BCC . 
2820 STA STROBE 
2830 .5 RTS 
2840 toe ne nnn oe 
2850 DECTBL .DA #1,#10,#100, #1000, #10000 
ooe0 DECTBH -DA /1,/10,/100,/1000,/10000 
2880 #---build output line 
2890 #--- ignore line numbers 
2900 &--- expand blanks and multiples 
2910 &--- use low ascii 
g 20 = end with OD (return) 
2940 CONVERT .ONE.LINE 
2950 LDY #0 
2960 STY POUT 
2970 STY PIN 
29380 .1 JSR GET.CHAR 
2990 BEQ .4 --eEnd of Line 
3000 BMI .2 ... blanks or other multiple 
3010 JSR PUT.CHAR simple ASCII char 
3020 JMP .1 
030 .2 CMP #$C0 
O40 BCS . -..other multiple 
050 AND #$7F 
3000 TAX 
070 LDA #$20 
3080 JSR PUT.CHAR.MULTIPLE 
3090 JMP .1 
3190 <3 JSR GET.CHAR get count 
110 TAX 
3130 JSR GET.CHAR et repeated char 
190 JSR PUT.CHAR.MULTIPLE 
3140 JMP .1 
3150 .4 LDA #$0D 
3180 JMP PUT.CHAR 
are $e eee nen een ne een nee 
3180 GET.CHAR 
3190 LDY PIN 
3200 INC PIN 
3210 LDA LINE.SC,Y 
3220 RTS 
32 0 #---------- eee 
240 PUT.CHAR 
3250 LDX #1 
3260 PUT.CHAR.MULTIPLE 
LDY POUT 


0 
od 


STA LINE.TEXT,Y 
INY 

DEX 

BNE .1 

STY POUT 

RTS 


NO: Oeeeetececceouteubeeseree ses eens 
3350 PRINT 
21A4- gS 3360 PLA POP RETURN ADDRESS 
a , 51 22 ie a PNTR+1 BECAUSE IT POINTS TO STRING 
21A9- BD 52 22 3390 STA PNTR+2 
21AC- 20 C3 21 00 JSR PRINT.VIA.PNTR 
Ae ag 52 22 ne Bee PNTR+2 PUT RETURN ADDRESS ON STACK 
- A 
21B3- AD 51 22 3430 LDA PNTR+1 
21B6—- 48 3440 PHA 
21B7- 60 ice P RTS 
21B8- 09 80 3470 PVP ORA #$80 
21BA- C9 DC 3480 CMP #*\*" 
21BC- DO 02 3490 BNE .1 
21BE- AQ 8D 3240 LDA fe 
21C0- 20 ED FD 3510 .1 JSR COUT PRINT CHAR 
520 PRINT.VIA.PNTR 
21C3= 20 48 22 3530 JSR GET.VIA.PNTR GET NEXT CHAR OF STRING 
21Co- DO FO 540 BNE PVP 00 = END OF STRING 
21C8- 60 2 : 2 
570 *® Print a string which begins with a byte count 
32 0 JSR PRSTR 
590 # -DA address of byte count 
3600 fn en ee ee 
610 PRSTR 
21C9- 68 3920 PLA 
S1cD- 68. 3eh0 eum 
21CE- 8D 52 22 3850 STA PNTR+2 
Scie a 48 22 3066 ark GET.VIA.PNTR 
ae - + 48 22 3660 are GET.VIA.PNTR 
a ip 52 22 ie aa PNTR+2 PUT RETURN ADDRESS ON STACK 
Syens it 51 22 120 BEA PNTR+1 
21E1- 8E 51 22 Tho STX PNTR+1 
21E4- 8C 52 22 12° STY PNTR+2 POINT AT STRING NOW 
ae = vt 50 22 ae PNTR GET BYTE COUNT 
21EB- 20 48 22 3 fo o1 JSR a GET NEXT CHAR OF STRING 
21EE- 09 80 90 ORA #$80 
str3> ch SD eg gay cour 
21F4- DO F5 3830 BNE .1 
21F6- 60 830 RTS 


DON LANCASTER STUFF 


INTRODUCTION ASK 


TO POSTSCRIPT 


A 65 min user group VHS 
video with Don Lancaster 
sharing many of his laser 
publishing and Postscript 
programming secrets. 


Includes curve tracing, $5 
toner refilling, the full Kroy 
Kolor details, page layouts, 
plus bunches more. 


$39.50 


FREE VOICE HELPLINE 


Box 809-SC 


Apple Assembly Line.... 


THE GURU 


An entire set of reprints to 
Don Lancaster's ASK THE 
GURU columns, all the 
way back to column one. 
Edited and updated. 


Both Apple and desktop 
publishing resources are 
included that are not to be 
found elsewhere. 


$24.50 


APPLE llc/lle 
ABSOLUTE 
RESET 


Now gain absolute control 
over your Apple! You stop 
any program at any time. 


Eliminates ali dropouts on 


your HIRES screen dumps. 
Gets rid of all hole blast- 


ing. For any lic or lle. 


$19.50 


SYNERGETICS 
Thatcher, AZ 85552 


-April, 1988.... 


POSTSCRIPT 
SHOW & TELL 


Unique graphics and text 
routines the others don't 
even dream of. For most 
any Postscript printer. 


Fully open, unlocked, and 
easily adaptable to your 
own needs. Available for 
Apple, PC, Mac, ST, many 
others. 


$39.50 


VISA/MC 


(602) 428-4073 
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HNO Sav eckceetensed chee tec satsees 
3800 # Input a string from the keyboard (or EXEC file) 
3870 READ. STRING 
21F7- 68 3880 PLA 
21F8- 8D 51 22 3890 STA PNTR+1 
21FB- 68 3900 PLA 
21FC= 8D 52 22 3910 STA PNTR+2 
21FF- 20 48 22 3350 JSR GET.VIA.PNTR 
2202- 8D 34 22 2g STA .2+1 
2205- 8D 2 22 3940 STA .3+1 
2208—- 20 48 22 3950 JSR GET.VIA.PNTR 
220B=- 8D 35 22 308 STA .2+2 
220E- 8D 46 22 fe STA .3+2 
2211= AD 52 22 3980 LDA PNTR+2 PUT RETURN ADDRESS ON STACK 
22th= 4 tae PHA 
2215 51 22 00 LDA PNTR+1 
2218 4010 PHA 
HQ20 #----------- ee ee ew eee 
2219= A2 01 4030 .0 LDX #1 
221B=- 20 OC FD 4OHO «1 JSR RDKEY 
221E- 09 80 4050 ORA #$80 
2220- C9 88 4060 CMP #$88 
2222- D 4070 BNE . 
222h—- CA 4080 DEX 
2225- FO Fe 4090 BEQ .0 
222T- 20 ED FD 4100 JSR COUT 
222A- AX AO 4110 LDA #* 
222C- 20 ED FD 4120 JSR cous 
222F- AQ 88 Tee LDA *S 
5533. 8D 35 33 W150 2 SrA 3 33,X 
= : : 
22 é- EO 3 4160 CPX ii 
2238— BO El mat BCS . 
223A- EB 4180 INX 
223B- 20 ED FD 4190 .25 JSR COUT 
223E- C9 8D 4200 CMP ta 
2240=- DO DI 4210 BNE . 
2242- CA 4220 DEX 
Souk- GE 33 33 WOkO .3 STX $3333 
2247- 60 4250 RT 
4260 #-------- ee nn nn ee ee 
4270 GET.VIA.PNTR 
2248- EE 51 22 4280 INC PNTR+1 BUMP POINTER TO NEXT CHAR 
224B- DO 03 4290 BNE PNTR 
224D- EE 51 22 4300 INC PNTR+1 
2250=- AD 33 33 4310 PNTR LDA $3333 GET NEXT CHAR OF STRING 
2253- 60 4320 RTS 
940 Wesewe eee eee ese ee So 
4340 ~-DO FANCY 
2254- 4350 PATHI .BS 65 
4360 - ELSE 
4370 PATHI .DA #PATHI.LEN 
4380 eAS "SC.2.TEXT" 
4390 PATHI.LEN .EQ #-PATHI-1 
4400 ~FIN 
W410 #------------- ee 
4420 -DO FANCY 
2295- 4430 PATHO .BS 65 
K4UO - ELSE 
4450 PATHO .DA #PATHO.LEN 
4460 AS "TTT" 
4470 PATHO.LEN .EQ #-PATHO-1 
4480 » FIN 
HUGO; Wate ccduasictnwatscceenboe tosses 
22D6- 4500 LINE.SC «BS 256 
23D6- Wb10 L LINE.TEXT -BS 256 
24D6—- 4530 -BS #+255/2568256-# Pad to next page 
2500- 4540 BUF.I .BS $400 
2900- up Q BUF.O .BS $400 
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Modify CATALOG to Show All AuxTypes.......Bob Sander~-Cederlof 


Apple Computer has started spreading the word that they are 
going to make further use of the AuxType field in the ProDOS 
file directory. Until now it has had three primary purposes, 
depending on the file type. 


Binary files (type BIN, or $06) use the AuxType field to hold 
the loading address. System files (type SYS, orSFF) files do 
too, but since they always load at $2000 it is never used. 
Applesoft files (type BAS, or SFC) also use it for the loading 
address, but I don't believe it is ever used. I haven't tested 
it, though. If you use the S-C Macro Assembler under ProDOS, 
it uses a filetype called “S-C" for source code files. This is 
type SFA, which ProDOS reserved for Integer BASIC, just in 
case. S-C used type I files under DOS, so I decided to use 
type INT files under ProDOS. Anyway, I put the loading address 
in AuxType for these files too. It is never used. 


Text files use AuxType to specify the record length for 
random-access files; it is 0000 for sequential files. 


AppleWorks files (types ADB or $19, AWP or SlA, and ASP or $1B) 
are the most creative, using 15 of the 16 AuxType bits to 
modify the file name characters. Each bit corresponds to one 
of the file name characters,. allowing AppleWorks to show and 
recognize the file name with lower-case letters and spaces in 
it. Regular ProDOS only displays upper-case letters in the 
names, and does not allow spaces. AppleWorks could have just 
stored the real ASCII codes in the filename field, but then the 
rest of ProDOS would not be able to access the files. By uSing 
the AuxType field, all is compatible. 


Probably there are some other uses for AuxType that I do not 
know about. And now Apple has decided to use it to allow more 
than 256 different file types. It seems that 256 is not going 
to be enough now that we have PropoS-16. If you are writing 
software for the Apple market and you need some private 
filetypes, you are supposed to write Apple Developer Tech 
Support and tell them of your needs. They in turn will assign 
you the appropriate file types. Since there are more requests 
than 256, they are starting to categorize them. For example, 
there may be a future file type for all word processors, with 
different AuxType values to distinguish various kinds of word 
processor files. 


Apple has suggested that we start displaying the AuxType 
information in CATALOGs for more types than just TXT and BIN. 
I looked into BASIC.SYSTEM and found a patch that makes it 
display for all file types. I also looked into the S-C Macro 
Assembler's SCASM.SYSTEM for the same kind of patch. 


In BASIC.SYSTEM, you need to change one byte from $27 to $ll. 
The byte is at $A513 after BASIC.SYSTEM is operating, so you 
could do a POKE 42259,17 to turn the feature on, and POKE 
42259,39 to turn it off. If you want to make a permanent 
change, you can do it this way: 


Apple Assembly Line.....April, 1988..... Copyright (C) S-C SOFTWARE.....Page 29 


BLOAD BASIC.SYSTEM,TSYS,A$2000 
POKE 12051 ,17 
JBSAVE BASIC.SYSTEM,TSYS,A$2000 


Location 12051 is $2F13, which is where the code resides when 
the file is BLOADed as above. 


In SCASM.SYSTEM, you need to change one byte from $16 to $00. 
The byte is near $B000 when the S-C Macro Assembler is 
operating, but the exact location depends on the particular 
edition you have. I suggest dis-assembling starting at SAFFO 
and looking for the following code: 


C9 04 CMP #$04 

DO 04 BNE ... 

AS D2 LDA #$D2 

DO 06 BNE ... 

C9 06 CMP #$06 

DO 16 BNE ... change this "16" to “00" 
AI Cl LDA #$Cl 


In the version I was using that "16" byte was at $BOOE. From 
within the assembler I typed “SBO0E:00" and that did the trick. 
If the “$* commands don't work in your computer, you can go to 
the monitor by typing “MNT“ and the make the patch. 


If you want to make a permanent change, you need to BLOAD 
SCASM.SYSTEM, patch the byte, and BSAVE it again just like I 
did with BASIC.SYSTEM above. In my version, I found the byte 
at $510E when the file was loaded. 


Do You Have 
Apple Knowledge? 


If you do, Applied Engineering would 
like to put your knowledge to work. 
We're looking for someone to filla 
position in our Technical Support group. 
You must have a strong working knowledge 
of AppleWorks, ProDOS, DOS 3.3, and AppleSoft BASIC. 
Applied Engineering offers good benefits and a pleasant work 
environment. Office is non-smoking. We're located in the 
Carrollton area. 

So if you've got the knowledge and want to sink your teeth into a 

position with an ever-expanding company, give us a call at 
(214) 241-6060. 
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BLOADIing DirectoOrieS...cccccccccsscveeeeee BOD Sander-Cederlof 


Did you know that ProDOS will let you BLOAD a directory just 
like any other kind of file? I did not until today. 


For example, if I want to load the directory of my Sider hara 
disk into memory, I can type BLOAD /HARD1,TDIR,AS1000. I can 
load in any subdirectory the same way. This works under both 
BASIC.SYSTEM (Applesoft) and SCASM.SYSTEM (the S-C Macro 
Assembler) shells. 


In both cases, if you care to, you can find the length of the 
directory in bytes in locations $BEDB and S$BEDC. SBEDB will 
always contain 00, and S$BEDC will be the number of pages in the 
directory, or twice the number of blocks. 


I tried BSAVEing... but it is prohibited. You get a FILE 
LOCKED message for your efforts. 


Enter oft: 


Basic-like macros which make the complex simple. Don't re-write that 
multiplication routine for the hundredth time! Get EnterSoft instead! Do 
8/16/32/64 bit Math/Input-Output/Graphics simply without all of the 
hassles. These routines are a must for the serious programmer who 
doesn't want to spend all of his/her time trying to re-invent the wheel. 
DOS 3.3 Version=$30.00, ProDos Version=$30.00, BOTH for only $50.00. 

GET YOURS TODAY. 


H Shape Table Program: 


For once! A shape table program which is logically organizied into its 
componet parts. Each section resides in its own program. The editor, 
disk access, Hi-Res section; each section is separate. Written almost 
entirely in Basic, it is easily modified. Not copyprotected! Put them on a 
Hard Disk, Ram Drive, anywhere! DOS 3.3 Version=$20.00, ProDos 
Version= pxeew 00, BOTH for sae 00! 


Send Check or Money Order To: S ProDos Upgrade for DOS 3.3 
Y EnterSoft Owners = $20.00 
Mark Manning 
c/o Simulacron |/Baggy Game 
P.O. Box $8598 


Webster, TX 77598 § — Thanks for the letters - 
> Keep Writing! 
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Visiting Phoenix, continued from front page. 


Bill Mensch gave several interesting talks regarding the history 
of the 6502 family and its future. The 65832 is on the horizon, 
but not fully defined. We know it will have 32-bit registers, 
multiply/divide instructions, and probably even floating point 
arithmetic. We can also be certain it will be plug compatible 
with the 65816, so we will be able to plop them directly into 
Apple IIgs sockets. We still have opportunity to send ideas for 
its features to Bill. Suggestion: do it in writing, be brief, 
keep any such letter to one or two ideas and no more than two 
pages. If you have more ideas, send them in separate letters, 
giving Bill time to digest them. Send your ideas direcly to Bill 
at Western Design Center, 2166 East Brown Road, MeSa, AZ 85213. 
If you are VERY serious, give hima call at (602) 962-4545. 


You might also want to write for information about their new line 
of microCOMPUTERS: the W65C134 includes a 65C02, RAM, ROM, and 
oodles of I/O goodies all in one 68-pin package; the W65C265 will 
be even better, and built around a 65C816; and the W65C365 will 
include a 65C832. 


A real highlight of the trip was meeting Don Lancaster, and his 
wife and daughter. Don was there to show and sell his many books 
and disks full of Apple and Postcript knowledge, and both he and 
wife Bea gave several seminars during the conference. If you are 
Going ANYTHING with laser printers, you need to look at what Don 
has. His “Ask the Guru“ column in Computer Shopper is a gold 
mine, and you can get a neatly bound set of reprints for only 
$24.50. Speaking of gold mines reminds me of caves, and the fact 
that the Lancasters are avid spelunkers,. 


Bill and I also enjoyed our lengthy discussions with Jeff 
Creamer, Steve Stephenson, and John & Ron Wrenholt. Jeff is a 
teacher in Prescott, AZ, and has published in these pages. Steve 
is chief programmer for Checkmate Technology, and gave me some 
wonderful disk files about AppleWorks. Expect to see some of his 
stuff here in the near future. John is the founder of Big Red 
Apple Club, now called Big Red Computer Club. He and brother Ron 
have quite a lot to offer any Print Shop afficionados, including 
a new program which lets you print labels with color graphics. 


“Do not be conformed to this world, but be transformed 
by the renewing of your mind, that your may discover 
the good, and acceptable, and perfect will of God." 
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